100 REM VIDEO RESET - RELOCATABLE
110 ML=50000: REM START ADDRESS
120 :
130 X=ML: X1=X+21: X2=X+95
140 H1=INT(X1/256): L1=X1-256*H1
150 H2=INT(X2/256): L2=X2-256*H2
160 H3=INT(X/256):  L3=X-256*H3
170 GOSUB 230
180 PRINT"TAP RESTORE TO RESET VIDEO"
190 POKE ML+1,L1 : POKE ML+3,H1
200 POKE ML+11,L2: POKE ML+13,H2
210 POKE ML+99,L3: POKE ML+100,H3
220 SYS ML: END
230 READ A: IF A=-1 THEN RETURN
240 POKE X,A: X=X+1: GOTO 230
250 DATA 169,128,162,192,141,24,3,142
260 DATA 25,3,169,202,162,192,141,0
270 DATA 3,142,1,3,96,72,152,72
280 DATA 169,6,141,32,208,141,33,208
290 DATA 169,14,141,134,2,169,23,141
300 DATA 24,208,169,200,141,22,208,169
310 DATA 27,141,17,208,169,199,141,0
320 DATA 221,160,0,173,134,2,153,0
330 DATA 216,153,0,217,153,0,218,153
340 DATA 0,219,200,208,241,140,21,208
350 DATA 152,153,0,212,200,192,25,208
360 DATA 248,104,168,104,76,71,254,72
370 DATA 138,72,32,0,192,104,170,104
380 DATA 76,139,227,-1